(defpackage :html
  (:use :cl)
  (:export
   :a
   :img
   ))

(in-package :html)

(defmacro a (href label &rest attrs)
  `(spinneret:with-html
     (:a :href ,href ,@attrs ,label)))

(defmacro img (src &rest attrs)
  `(spinneret:with-html
     (:img :src ,src ,@attrs)))
